home *** CD-ROM | disk | FTP | other *** search
/ Especial Multimedia / Especial Multimedia.iso / Multimed / Prg / THRMDEMO.ZIP / README.TXT < prev    next >
Text File  |  1997-09-14  |  2KB  |  46 lines
  1. '*******************************************************
  2. '* Integrated Data Systems, Inc.                       *
  3. '* 23875 Ventura Blvd. #102                            *
  4. '* Calabasas, Ca  91302                                *
  5. '* Voice: (818)223-3344                                *
  6. '* BBS:   (818)223-3341                                *
  7. '* CIS:   73700,1622                                   *
  8. '*******************************************************
  9. '*                                                     *
  10. '*      File Name: ThrmDemo.BAS                        *
  11. '*                                                     *
  12. '*        Created: 12/23/94     By: Robert Vandehey    *
  13. '*                                                     *
  14. '*******************************************************
  15.  
  16. 'This program demonstrates a wait box which displays a
  17. 'thermometer. One of the main features of this wait box
  18. 'is that it acts modal without actually declaring it as
  19. 'modal.
  20.  
  21. 'In Visual Basic, once a modal form is called, all execution
  22. 'in the calling program is stopped until the form is unloaded.
  23. 'This doesn't work for wait screens since you usually want to
  24. 'display a wait screen and continue on processing.
  25.  
  26. 'Visual Basic allows you to display a modeless window and continue
  27. 'processing but if the user selects another window with the
  28. 'mouse, it will change the focus of the window. Many times hiding
  29. 'the wait window.
  30.  
  31. 'I looked at many other programs that tried to solve this problem
  32. 'but none of them did it effectively. This program does - at least
  33. 'in my humble opinion.
  34.  
  35. 'It solves this problem by looping through all the Visual Basic
  36. 'forms in the Forms Control array and calling the Windows API
  37. 'SetWindowLong function to set the DISABLE style for each window.
  38.  
  39. 'Once the wait window is no longer needed, the DISABLE style is
  40. 'removed.
  41.  
  42. 'Currently this program only supports one instance of the wait form.
  43. 'It could easily support more, but I can't think of a reason why anyone
  44. 'would need more than one wait form at a time.
  45.  
  46.